Nuprl Lemma : do-apply-pred?
11,40
postcript
pdf
es
:event_system{i:l},
e
:es-E(
es
). sqequal(do-apply(es-pred?(
es
);
e
); es-pred(
es
;
e
))
latex
Definitions
event_system{i:l}
,
t
T
,
x
:
A
.
B
(
x
)
,
es-E(
es
)
,
pred(
e
)
,
es-pred(
es
;
e
)
,
do-apply(
f
;
x
)
Lemmas
es-E
wf
,
event
system
wf
origin
es:event_system{i:l}, e:es-E(es). sqequal(do-apply(es-pred?(es); e); es-pred(es; e)) es:event_system{i:l}, e:es-E(es). sqequal(do-apply(es-pred?(es); e); es-pred(es; e)) 
Tx:A. B(x)